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MACHINETAAL IN PAKKET 


Afgelopen maand lanceerde 
het Nederlands Talen Instituut 
een nieuwe schriftelijke com- 
putercursus: machinetaal met 
de Commodore 64. 

De cursus is bedoeld voor 
hobbyisten met Commodore- 
basic-ervaring, die hun machi- 
ne(taal)kennis willen vergroten. 
Ervaring in machinetaal is 
geen vereiste. Ook het bezit 
van een assembler en/of ma- 
chinetaalmonitor is niet nood- 
zakelijk, omdat beide program- 
ma’s gratis bij de schriftelijke 
cursus worden geleverd. Voor 
de insiders: het gaat hier om 
de PAL-assembler en de SAM- 
MON monitor. 

De cursus, die uit 32 lessen 
bestaat, bevat naast een flinke 
portie theorie een aantal zoge- 


COMMODORE DOSSIER AKTIEF verschijnt 
12 keer per jaar. In februari, mei, au- 
gustus en november als bijlage in het 
hart van Commodore Dossier, in de overi- 
ge maanden als losse uitgave uitsluitend 
voor abonnees van Commodore Dossier. 
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noemde ’source-codes’, die 
met behulp van de assembler 
ingetikt en/of veranderd kun- 
nen worden. De totale cursus- 
duur bedraagt 8 maanden. 
Volgens Ir. H.J.A.M. Bodelier, 
auteur van de cursus, heeft 
het volgen van een schriftelijke 
computercursus machinetaal 
veel voordelen: 


’’Doordat er een regelmatig 
schriftelijk contact met de le- 
raar plaatsvindt, kunnen even- 
tuele inzichts-fouten snel ge- 
corrigeerd worden. 

Bodelier: Na afloop van de 
cursus kan men zelf goed 
doordachte machinetaalpro- 
gramma’s schrijven. Boven- 
dien is zijn kennis over de 
Commodore 64 dan ziender- 





ogen vergroot, omdat we flink 
wat plaats hebben ingeruimd 
voor informatie over deze ma- 
chine.” 

De cursus, die normaal 
gesproken (bij een tempo van 
1 les per week) 8 maanden 
duurt, kost f 99,80 per maand. 
Voor meer informatie kunt u 
terecht bij het NTI, Rechtzaad 
2, 4703 RC Roosendaal. 

Het telefoonummer van het 
NTI is 01650-60120. 


STORYTEL 


Het begint misschien wat een- 
tonig te worden, maar het is 
nu eenmaal zo: de bulletin 
boards schieten in ons land 
als paddestoelen uit de grond. 
De vele publiciteit rond het ’in- 
breken op computersystemen’ 
via een modem heeft daar fors 
aan meegeholpen. Nederland 
begint echt in de ban van de 





PUBLIEKS SOFTWARE 


In de Verenigde Staten is ’pu- 
blic domain’ software een heel 
normaal verschijnsel. Program- 
matuur dat bezit is van het pu- 
bliek en derhalve vrijelijk te co- 
piéren en te verspreiden is. In 
West-Europa, en dan met name 
in Nederland, is het fenomeen 
public domain nog vrij onbe- 
kend. Onder public domain, 
oftwel publieks eigendom, val- 
len bijvoorbeeld programma’s 
die als listing in computerbladen 
worden afgedrukt. In Raalte 
bestaat nu sinds een paar maan- 
den een bedrijfje dat zich het 
lot van die openbare program- 
matuur heeft aangetrokken. 
Publieks Software (hoe kan het 
ook anders) is de naam van de- 
ze firma die zich ten doel heeft 


gesteld licentie vrije programma- 
tuur aan te bieden tegen kost- 
prijs. Voor 16 gulden kan men 
een cassette of diskette aan- 
schaffen met gemiddeld zes pro- 
gramma’s. Deze programma’s 
mogen dan naar hartelust geco- 
pieerd, aangepast en veranderd 
worden. Thuis-programmeurs 
die zelf een programma hebben 
geschreven kunnen dat kwijt 
aan Publieks Software, die ver- 
volgens voor de verspreiding 
zorgt. Bovendien ontvangt de 
programmeur minimaal 0.40 
cent per verkocht programma. 
Voor informatie kunt u een 
briefje schrijven naar Publieks 
Software, postbus 165, 8100 AD 
in Raalte. Bellen kan ook: 
05720 — 58022. 
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VERDIEN GELD MET UW 
COMPUTER! 





modem te komen. Het wordteen 
rage die de populariteit destijds 
het ‘bakkie’ doet verbleken. 

Nu zijn er maar weinig begin- 
nende ‘hackers’, zoals de 
computerkrakers in vakjargon 
heten, die er daadwerkelijk in 
slagen een computersysteem 
binnen te dringen. Veel bedrij- 
ven ondervinden echter wel 
overlast van alle pogingen. 
Om al die aspirant-hackers nu 
van dienst te zijn is nu Storytel 
opgericht. Storytel is een com- 
puterdatabank die er op in 
speelt de puzzelmanie van 
computerenthousiasten in le- 
gale banen te leiden. De hard- 
nekkige krakers, die echt in 
het systeem weten binnen te 
dringen doen dit niet eens 
voor niets. In het computerpro- 
gramma van deze databank zit 
namelijk een schat van van 
1000,- gulden verborgen. 

Voor tien gulden kan iedereen 
een toegangsnummer aanvra- 
gen en daarmee een maand 
lang naar de schat zoeken. Als 
aan het eind van de maand de 
schat niet gevonden is, wordt 
hij uitgereikt aan degene die 
hem het dichtst heeft bena- 
derd. Het telefoonnummer is 
010-58 76 40. 











Reacties op Commodore Dossier en CD Aktief zijn natuurlijk altijd welkom. 


Alle lalla krijgen antwoord, maar niet alle brieven kunnen worden 


in deze rubriek. Alleen vragen of opmerkingen die voor andere lezers ook in 


peplaats 
eressant 


zijn, komen voor plaatsing in aanmerking. De redactie kan brieven inkorten bij 
ruimtegebrek. 


ELEKTRICITEIT 

Ik zit met het volgende pro- 
bleem. Als de Provinciale 
Utrechtse Elektriciteits Maat- 
schappij in onze gemeente om 
ongeveer 23.00 uur overscha- 
kelt op nachtstroom dan valt 
op dat moment het in mijn 
computer aanwezige program- 
ma weg en verschijnt het be- 
kende blauwe startbeeld met 
38911 basic bytes free. 
Bestaat er voor deze lastige si- 
tuatie een oplossing en heb- 
ben meer lezers deze er- 
varing? 

F. Frolich, Cothen 


Er zijn apparaten in de handel 
die een euvel als het even 
wegvallen van de stroom on- 
dervangen. We hebben echier 
het idee dat die nogal kostbaar 
zijn. Wellicht dat andere lezers 
u een goedkope en afdoende 
oplossing aan de hand kunnen 
doen. 


VIDITELMODEM 

Ik heb twee vragen. Ik heb op 
een beurs een tweedehands 
Siemens Viditel modem ge- 
kocht. Er zat verder echter 
niets bij, maar de verkoper 
verzekerde me dat de modem 
op de C-64 aan te sluiten was. 
Eenmaal thuisgekomen merkte 
ik dat er geen RS 232C aan- 
sluiting op zat, zodat ik gelijk 
met de handen in het haar zat. 
Hopelijk dat een lezer me hier- 
mee kan helpen. 

Daarnaast heb ik interesse in 
enige informatie over de 1520 
plotter. Ik heb al vaak geinfor- 
meerd hoe deze plotter precies 
werkt, maar ben er nog niet 
achter. Bovendien zou ik le- 
zers die een dergelijke plotter 
hebben willen vragen me en- 
kele tekeningen op te sturen. 
Uiteraard tegen vergoeding. 

W. Groeneveld, Viaardingen. 


Wie de heer Groeneveld kan 
helpen kan contact met hem 
opnemen. Zij adres is Prof. 





Uw reacties graag naar: Commodore Dossier, Rijnsburgstraat 11, 


1059 AT Amsterdam. 


Telderstraat 324, 31382 AZ 
Viaardingen. 


BELGISCHE BBS’ 

Sinds enige tijd ben ik in het 
bezit van een Teletron modem. 
\k heb dat ding in Breda ge- 
kocht, want in Belgié worden 
deze modems niet verkocht. In- 
middels heb ik de modem al 
duchtig in gebruik. Het pro- 
bleem is echter dat er in Com- 
modore Dossier enkel telefoon- 
nummers staan van Nederland- 
se bulletin boards. En aange- 
zien dat voor mij internationale 
gesprekken zijn, loopt mijn re- 
kening hier na een 50-tal ‘tele- 
foongesprekken’ al aardig op. 
Dit gaat mij dus een bom dui- 
ten kosten. Is het niet mogelijk 
om in Commodore Dossier, dat 
ik een steengoed blad vind, 
een lijstje af te drukken met 
Belgische bbs’? U moet weten 
dat het modemgebruik in Bel- 
gié bij hobbyisten nog niet erg 
in de mode is. Bovendien we- 
ten we van elkaar niet dat we 
een modem bezitten. U kunt 
ons misschien een zetje in de 
goede richting geven. 

Nu ben ik van plan bij mij 
thuis een kleine databank op 
te starten. Wie kan mij aan de 
nodige programmatuur helpen 
of een adres waar ik de sofwa- 
re kan kopen? 

M.Mare, Kortenberg Belgié. 


Helaas zijn wij ook niet op de 
hoogte van het bestaan van 
Belgische databanken. Hope- 
lijk dat naar aanleiding van uw 
brief zich een aantal bbs’ zal 
melden. In dat geval zullen we 
zeker de telefoonnummers en 
openingstijden in Commodore 
Dossier opnemen. 


ADMINISTRATIE 

Ik doe onder meer de admi- 
nistratie van een cafetaria. Nu 
wil het bedrijf de administratie 
gaan automatiseren. Ze willen 
een computer aanschafien met 
in eerste instantie daarbij een 


boekhoud-programma. Met 
een dergelijk programma moe- 
ten onder meer alle staten bij- 
gehouden kunnen worden, ter- 
wijl ook het maken van een 
balans tot de mogelijkheden 
moet horen. Welke computers 
zijn hier geschikt voor en wel- 
ke programma’s zijn er zoal? 
Scholtes, Honselersdijk 


In principe kan op elke compu- 
ter een boekhouding worden 
gedraaid. Ook op de C-64. 
Omdat dit blad speciaal voor 
de Commdore-gebruikers is 
Zullen we ons tot dit merk be- 
perken. Een eenvoudig, maar 
goed werkend programma is 
Finad 64 van de Hilversumse 
firma Computer World. Een 
wat uitgebreider en daardoor 
duurder programma is Prompt- 
boekhouding van het software- 
huis Prompt in Amsterdam. 
Van dit laatste programma 
vindt u een beschrijving in 
Commodore Dossier nr.4 op 
pagina 16. 


GERAMMEL 

Als ik weer eens een diskette 
formatteer in mijn 1541, dan 
moet ik altijd dat verschrikke- 
lijk gerammel aanhoren. Bij 
mijn weten is de oorzaak de 
kop die tegen het stoorpunt 
komt. Ook weet ik dat de 
lees/schrijfkop hierdoor danig 
ontregeld kan worden. Ik zou 
graag willen weten of bovenge- 
noemde beweringen waar zijn, 
wat ik tegen het gerammel kan 
doen en wat doe ik bij een 
ontregelde kop. Bij voorbaat 
dank, en veel succes met uw 
blad, vooral het communicatie 
gedeelie. 

E. Obbink, Dinxperlo. 


Het gerammel aan het begin 
van het formatteren van een 
diskette is een normaal ver- 
schijnsel. Bij erg vaak format- 
teren achter elkaar is het niet 
ondenkbaar, dat de kop ontre- 
geld wordt. Dit kunt u controle- 
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ren door van de test-diskette, 
die bij uw diskdrive geleverd 
is, het programma ‘Performan- 
ce test’ te draaien. Indien dit 
programma een fout consta- 
teert, is het verstandig om uw 
computer bij een computer- 
shop ter reparatie aan te bie- 
den. Ik raad u af om onoor- 
deelkundig zelf aan uw machi- 
ne te sleutelen. 


ALTERNATIEF 

Ik zoek naar een alternatief 
voor machinetaal. ik dacht 
daarbij aan een programma of 
zo voor de Commodore 64 
(niet op schijf), dat Basic- 
programma’s om kan zetten in 
machinetaal-programma’s. 
Bestaan er dergelijke program- 
ma’s en waar kan ik deze 
krijgen? 


Er bestaan inderdaad program- 
ma’s die Basic omzetten in 
machinetaal. Dat zijn zoge- 
noemde compilers. Ze zijn in 
elke goede compuierwinkel te 
koop, maar ze zijn niet 
goedkoop. 


BESTANDEN 

Vanaf het begin ben ik abon- 
nee van Commodore Dossier. 
Ik moet zeggen dat het een 
uitstekend blad is. Ik ben al 
enige tijd op zoek naar een 
goed en duidelijk artikel over 
het werken met bestanden in 
de ruimste zin van het woord. 
Ik bedoel dan niet het gebrui- 
kelijke onvolledige gezeur dat 
je bijna in elk boek kunt vin- 
den, maar echte uitleg over 
het werken met relatieve en/of 
sequentiéle files. Eventueel 
vergezeld van een subroutine 
die dan gebruikt kan worden in 
een zelf ontworpen program- 
ma. Kunt u aan iets dergelijks 
eens een artikel wijden. 


Nog even geduld. In Commo- 
dore Dossier nr.6 komen we 
hier uitgebreid op terug. 





De tweede aflevering alweer van 
deze rubriek voor enthousiaste 
programmeurs in machinetaal, 
door Roelf Sluman. Deze 
maand: de inhoud van een ge- 
heugenplaats zichtbaar op het 
scherm en wat zijn interrupts. 


GETALLEN 
PRINTEN 


Bijna iedere machinetaal- 
hobbyist kan het zich nog wel 
herinneren: Wie de inhoud van 
een geheugenplaats op het 
scherm wil zetten kiest voor de 
schijnbaar meest logische 
oplossing: 


LDA MEMLOC 
JSR $FFD2 


Helaas, helaas... Het enige dat 
de computer dan doet, is het 
BIJBEHORENDE ASCII- 
TEKEN op:het scherm zetten! 
We moeten dus, als we de in- 
houd van een geheugenplaats op 
het scherm willen zetten, hier- 
voor ZELF een routine maken. 
Een voorbeeld hiervan, de routi- 
ne DECOUT, vindt uw in listing 
2. 

De routine doet het volgende: 

1. Er wordt een getal uit een ge- 
heugenplaats (in ons geval: zp1 
of $fb) gehaald. 

2. Hier wordt steeds honderd 
vanaf getrokken, totdat het re- 
sultaat negatief is. We hebben 
dan het hondertal gevonden Gn 
X). Dit cijfer wordt geprint. 

3. We gaan van het restant nu 
steeds tien aftrekken, totdat de 
uitkomst negatief wordt. We 
hebben dan dus het tiental (in 
X) te gevonden. Ook dit cijfer 
wordt geprint. 

4. Het restant is het ééntal. Hier 
hoeven we niets meer van af te 
trekken; dit cijfer kan zonder 
meer worden uitgevoerd. 


Ook het uitvoeren (UIT’) ver- 
dient nog even onze aandacht: 
we moeten van een waarde (van 
0 tot en met 9) een ASCII-code 
maken. Hiervoor kijken we 
naar onderstaande tabel: 
CIJFER ASCII (HEX) 
48 
49 
50 


$30 
$31 
$32 


CIJFER ASCIL (HEX) 
51 
§2 
53 
54 
3) 
56 
Ss) 


$33 
$34 
$35 
$36 
$37 
$38 
$39 


Vergelijk de cijfers eens met 
hun hex-ascii-waardes en we 
zien dat ze met $30 zijn geORd! 
Dit is dus de oplossing voor ons 
probleem; we ORen de inhoud 
van A met $30, voordat we 
gaan printen. 


HEXA- . 
DECIMAAL 


De tweede routine (listing 2) 
doet hetzelfde als routine 1, met 
één verschil: de getallen worden 
hexadecimaal op het scherm ge- 
zet. Bovendien wordt er hier na 
elk getal een RETURN - 
chr$(13)-geprint. 

HEXOUT is, zeker wat het 
eerste gedeelte van het program- 
ma betreft, eenvoudiger dan 
DECOUT. Allereerst wordt het 
linkernybble (de linker 4 bits) 
naar rechts geschoven. We heb- 
ben nu dus een waarde van 0 
tot en met 15 ($0-$f). Hier 
wordt, bijna op dezelfde manier 
als hierboven, een getal (of een 
letter!) van gemaakt. Dit wordt 
nog eens herhaald voor de rech- 
ter 4 bits. 


INTERRUPTS 


ledere machinetaalprogrammeur 
heeft er wel eens van gehoord, 
maar lang niet iedereen durft ze 
te gebruiken: interrupts, ook 
wel IRQ’s genoemd, Ze zijn 
lang niet altijd noodzakelijk, 
maar ze kunnen, mits goed ge- 
programmeerd, een hoop werk 
uit handen nemen. 


WAT IS EEN IRQ? 


Elke zestigste seconden (ook tij- 
dens het uitvoeren van bijvoor- 
beeld een basic-programma) 
stopt de computer even waar hij 
mee bezig is. Er worden dan 
snel wat taken uitgevoerd, zoals 
het bijwerken van de tijd (ti$) 
het afhandelen van eventuele 
toetsdrukken en dergelijke. De 





IRQ-routine die hier zorg voor 
draagt begint op locatie $EA31. 
Het leuke is nu, dat we de com- 
puter eerst iets anders kunnen 
laten doen, voordat hij met z’n 
eigen [RQ begint. Hiervoor ver- 
anderen we eenvoudig een zoge- 
naamde POINTER (niets meer 
of minder dan een ’wegwijzer’). 
Deze pointer wijst normaal naar 
$EA31, maar we laten hem nu 
naar onze eigen routine wijzen. 
Na afloop van onze routine ge- 
ven we de computer dan op- 
dracht om naar z’n eigen routi- 
ne (dus: $EA31) te springen. 
Als er dan een IRQ optreedt (el- 
ke zestigste seconde dus) doet 
de computer het volgende: 


1. A, X, Y en SR redden (dit 
gaat automatisch) 

2. onze zelfgeschreven routine 
uitvoeren 

3. naar z’n eigen IRQ-routine 
springen 


De eenvoudigste IRQ die er te 
schrijven valt, vindt u in listing 
3. Elke zestigste seconde (tel 
maar mee) wordt de randkleur 
veranderd. Meteen daarna 
springt de computer naar z’n ei- 
gen routine. 


De laatste listing (listing 3) be- 
vat een iets uitgebreidere IRQ- 
routine. Er wordt (via locatie 
197) gekeken of Gen van de 
functietoetsen is ingedrukt. Is 
dat het geval, dan voert de 
computer een bepaalde opdracht 
uit. 

Let op een paar bijzonderheden: 
1. Het op de stapel zetten 
(PHA’) van het gekozen adres 
min één. Door middel van RTS 
komt de computer op het juiste 
adres terecht. Deze methode is 
niet al te bekend, maar is zeer 
handig als het gaat om zoge- 
naamde ’menu-keuzes’. Ook in 
E.V.A. (zie elders in dit num- 
mer) wordt hij uitvoerig ge- 
bruikt. 

2. Het gebruik van een TEL- 
LER ($FB). Doordat interrupts 
zo vaak plaatsvinden, zou er 
veel te vaak getest worden. De- 
ze teller voorkomt dat. 

3. Het springen door middel 
van carry clear. Dit scheelt elke 
keer weer één byte (in plaats 
van een JUMP een BRANCH 
gebruiken). Omdat, door ASL 
de carry in dit geval op nul 
wordt gezet (A is in eerste in- 
stantie NOOIT groter dan zes!), 
kunnen we deze truc gebruiken. 





HEXOUT.SRC......PAGE O001 


LINE# Lot CODE LINE 


OOOO, 
NOO0S 
OO003 


0000 
Q000 
O000 
0000 
0000 
BO00 
8000 
8000 
8000 
8000 
8002 
BOOS 
BoO4 
8005 
8006 
8009 
8009 


; 


0009 
00010 
Oo001L 
OOOLS 
QO013 
Oogld 
0001S 
OOO1E 
OOO1L7 
OOO1B SOO 
9001S B800D 

OCs BOLO 
8010 
Boles 
BOLD 
8015 
BO1S 
8017 
8019 
801B 
BOLE 
BO20 
BOSS 


i 
UIT 


CIJFER 
LETTER 





E0030 
00031 


» END 


ERRORS = o0000 


SYMBOL TABLE 


SYMBOL VALUE 
CHROUT PRD 
ek OOF BR 


CIJFER BO1B 


END OF ASSEMBLY 
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Listing 1 


7 INHOUD VAN EEN GEHEUGENFLAATS 
;HEXADECIMAAL OF BEELDSCHERM 

i 

#=$BOOO 


3 
ZP1=SFB 
CHROUT=$F FDS 


LDA ZPi 
LOR A 
LSE A 
LSE A 
LSF 
JSR 


;LINKER 4 BRITS 
;KOMEN OF PLAATS 
;VAN RECHTER 4+ 

} BRITS 

A 
UIT pASCII EN PRINTEN 
LDA 
AND 
JSR 


aed 
H#AQOOOLLIL 
UIT 


;RECHTER 4+ BITS 


LDA 
JMP 


#12 
CHEOUT 


;CARRIAGE RETURN 


ORA 
CMF: 
BES 
JMP 
ADC 
BNE 


#930 
HOSA 
LETTER 
CHROUT 
HG 
LIJFER 


;ASCLI-CIJFER 
;GROTER DAN 37 
3J6, 7 BIJTELLEN 


;CARRY+6=7 
;OP SCHERM 


LETTER SOLE uy 











DECOUT.SRO.....+PAGE 0001 Listing 2 ira.ske......PAGE 9001 Listing 4 






































LINES LOG CODE LINE LINE# LOC CODE LINE 
oonet 90060 ;TNHOUD VAN EEN GEHEUGENPLAATS 90001 0000 PRRXVOORBEELD VAN EEN INTERRUPT 
90002 o000 ;DECIMAAL OF HET SCHERM 60002 0000 : 
90002 9000 ; oo 00003 0000 7F1 - VERANDERT RANDKLEUR 
99004 9000 k= $B000 00004 9000 3F2 ~ VERANDERT SCHERMELEUF 
90008 8000 ; 00605 0000 3F@ — VERANDERT TEKSTEKLEUR 
60006  BO00 Zhe 00006 0000 7F7 — KOUDE START 
00007 B00 ZFS 00007 0600 : 
OOOOR 8600 ZLES=SF D. 00008 9000 ; 
ONONS Bo00 CHROUT=$F FDS 00009 90000 BORDER = S3280 
E0010 s000 ; . _ ©0010 000 SCHERM = 5oee1 
OOO1lL B0900 AS FB LDA ZFi 7DEZE GEHEUBSENLOC 96611 9000 TESTEL = 646 
oodles snoz GOAN WE 7 DOEN’ 00012 o000 FL aod 
oooL 8002 85 FOC STA ZP2 00013 9000 FS = 5 
OooLld BoOoF ; OO0t4 O000 FS = 6 
QOO1S BOod i 00015 90000 F7 =o 
90016 so04 3WE DELEN ACHTEREENVOLGENS 60016 6000 LSTX = 197 
8004 ;DOOR HONDERD EN DOOR 16 00017 9000 TELLER = SFB 
8004 3 : co 00018 Oou00 3 
Boo4 2 64 LDX #100 FAP TRERTAL 00019 90000 : 
BOUG co 15 8D JSF DEEL O0020 0000 4 7 CASSETTEBUFFER 
8009 ; 00021 083 ; 
8009 ; X BEVAT HET QUOTIENT ones2 osac 728 SEI 
8009 ; 00023 O85D Ag 4D LDA #<NEWIRO 
8003 20 2A 80 JSR UIT 00024 OSSF aD 14 02 STA #0314 
BO0C ; . 00025 O842 Ag OS LDA #2NEWIRG 
BOOL AZ LDX #10 pr Bera 00026 OS44 8D 15 08 STA $0515 
BOE BO JSR DEEL 00027 0347 AY 05 LDA #5 
BOLL j 00028 0349 85 FE STA TELLER 
BOiL ; X BEVAT WEER HET QUOTIENT 00025 Osan Sd ae ES 
90080 BO11 ; e00s0 OS4c «EN _ RTS 
00031 8011 20 24 BO JSR UIT . 00031 o34D : 
Q00382 8014 : ; . 00032 OS4D C6 FB NEWIRG DEC TELLER 
00033 8014 LDX ZF2 00082 OS4F 10 10 BPL KLAAR 

=? 34 Ae JMP UIT 00034 0851 AD 0g LDA #3 
Q00SS o1s j . 00035 O35S 85 FR A : 
oOOSE 8019 8& FD DEEL SIX ZFS yj AF TREETAL, oooaé Ce r : Pe 

B0iB Az 00 LDX #0 QUOTIENT 00037 O855 AS CS : LDA LSTX 
B01D sI LUSOO1 SEC 00088 O357 Az 03 LDX #3 
BOLE AS FC LDA ZPe 00039 03859 ; 
20040 ES FD SBE ZFS 00040 0359 DD 64 03 USOOL CMP TA 
00041 BO OL BCS GADOOR PBROTER DAN NUL? qogqq oa Fo ic — Seo) ion Lee 
o00de 0 RTS jNEE, BLAAR 00042 OS5E cA DEX 
00048 as FC GADOOR STA ZPz yJA. OPB' N 00043 OS5SF 10 Fe Se gece: 
ododd ES INX ; QUOTIENT HOGER ee ee : 

90045 DO FS ENE LUSOOL 00045 0361 46 31 EA RLAAR IMP $EAS1 
boo ; OD04d6 OS64 ; 

Oo ; 00047 O264 o4 TABI =BYTE Fl,Fo FE 
000488 BA UIT TXA oe 0365 05 = - oe 
90049 OF 30 ORA #Z200110000 j;ASCII MAREN 00047 SEG O68 
QO0050 802D 40 De FF JMP CHROUT o0047 oSe7 53 
00051 8020 ~END 00048 0868 7B 08 TAAK = -WORD RAND~1 

00045 O86A 80 03 -WORD SCHEM-1 
- 00050 0860 85 08 WORD TEKST-1 
ERRORS = 90000 00051 O36E BA 02 -WORD DISABL-1 
00052 0370 ; 
: 90053 0370 : 
SYMBOL TABLE 00054 0870 BA BINGO TXA 
00055 OS71 OA ASL A ;DIT ZET CARRY OF NUL! 
SYMBOL VALUE . . 90056 O872 AA TAX : 
FEDS Bo19 GADOOR 8025 LUSOOL = BOLD oe besa : 
BOZA OOFB ZIPS OOFE ZFS OOF D Seone Sos ED Ga 05 y LDA TAAK+1, X 
3 3 Rad, 
00059 0376 48 PHA 
_ . 0C060 0377 BD 68 03 LDA TAAK, X 
END OF ASSEMBLY 00061 0878 48 FHA 
000G2 OS7B 6D RTS 
00068 OG7c 3 
«ott 00064 OS70 EE 20 DO RAND INC BORDER 
Listing 3 Googs os7F 90 FO BCE KLAAR CARRY IS ALTIJD 0 
SIMPLEIRO.SEC......PAGE 0001 pee et ; 
00067 OS81 EE 21 DO SCHRM INC SCHERM 
LINE# Loc CODE LINE beees Gee : a 
00070 0386 EE a6 Oz TEKST INC 646 
OOO71 OS89 90 DE : KLAAR 
Oo001 000 ;FEHDE ALLEREENVOUDIGSTE IRR eee Q0O72 OS6B 3 
e000 ; 00078 O@8B 78 DISABL SEI 
o000 x=828 00074 O88C AS 2 LDA #$31 
. 90075 OSBE 8D id oS STA $0314 
oo 00076 0891 Ag EA LDA #$EA 
TROPNT 00077 0853 SD 15 03 STA $0315 
BORDER 00078 0836 58 CLI 
ae O0079 O397 30 LB BCG KLAAR 
00080 o839 ; 
49 e0081 oBa9 » END 
id 03 
oS = oooce 
ts on ERRORS = 00000 





SYMBOL TABLE 





# 
NEWIRG ING 





00016 SYMBOL VALUE . 
o0017 JME $EA3 BINGO 03870 BORDER DOZO DISABL 0365 fi 9004 
FS FS 0006 0003 KLAAR: 0361 
: LSTX LUSOOL 0359 o34D RAND o87c 
SCHERM  DOZ1 SCHRM oge1 0368 TABEL oge4 
TEKST ogee TELLER  O0FB 0286 





ERRORS = O0000 
END OF ASSEMBLY 


SYMBOL, TABLE 


VALUE 
Db 





SYMBO 





TRGEN'T Osi NEWIRG C 





ASSEMBLY 
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(ae 


fa 


BASIC OMHOOG 


ie een groot programma zit te 
schrijven vernielt soms per on- 
geluk weleens zijn eigen spri- 
tes. Ook kan het voorkomen 
dat bij het tevoorschijn halen 
van de sprites het programma 
kapot wordt gepoked. Om dit 
te voorkomen moet u de 
Basic-pointer omhoog zetten. 
In de zero-page locaties 43 en 
44 staat de pointer naar de 
start van het Basic- 


programma. Het is zaak die 
naar een ander gebied te laten 
wijzen, zodat sprites, karakter- 
set en programma elkaar niet 
in de weg zitten. 
Een voorbeeld: 

POKE43, 1:POKE44,64 . Deze 
opdracht verplaatst het begin 
van Basic naar $4001. Hoe 
komt u hieraan? 64725641 = 
$4001 (high-byte, Low-byte). 
De defaultgetallen waren 1 en 
8. 8°256+1 = $0801 


KEYBORD BUFFER 


Adres 649 bevat de lengte van 
de keybord-buffer. Nu is het 
altijd leuk om iemand in de 
maling te nemen en dat kan 
door hier 0 in te poken. Het 
gevolg is dat de computer he- 
lemaal niets meer doet als er 
iets wordt ingetoetst. Zet je in 
dat adres echter een te groot 
getal, bij voorbeeld 30, dat 


bestaat de kans dat een aantal 
belangrijke sprong-vectoren 
wordt overgeschreven, wat 
weer tot gevolg heeft dat de 
computer op tilt staat. Zoals: 0 
POKE649,30 

1 goto 1 
Vervolgens laten runnen en de 
pret begint. 


DATAWOESTENIJS 


In tal van tijdschriften staan 
listings die kunnen worden 
overgenomen door de lezers. 
Om het overtypen te verge- 
makkelijken gebruikt de heer 
De Beer altijd de volgende 
regels: 

XXXX INPUT REGEL- 
NUMMER”RE 

XX10 FOR L=0 [O 
20:PRINTRE + x*L’’DA- 


TA’ :NEXT 
<X20 PRINT “RUNXXXX 
home>” 


XXXX is het op drie na laatste 
regelnummer van het program- 
ma. x is de interval tussen de 
regels. <home> laat de cur- 
sor naar de homepositie sprin- 
gen, wat weer wat tijd scheelt 
op het vele typewerk. 


EVEN ALLES WEG 


Staat het beeldscherm vol spri- 
tes in de verkeerde kleuren en 
je wilt het scherm snel op- 

nieuw starten dan kan dat met 


LIJNWISSER 


in de november-editie van Ak- 
tief stond een lijnwisser voor 
de Vic-20 afgedrukt. Daar op 
in hakend stuurt de heer De 
Beer de volgende lijnwisser 
voor de C-64. 
POKE781,re:sys59903. Hierbij 
is re de te wissen regel, dus 
van 0 tot 24. In een sub- 
routine in een for-next lus is 
deze truuk te gebruiken om op 


sys58648. Dit initialiseert on- 
der meer het scherm met spri- 
tes en al. 


een bestaand scherm toch 
steeds een nieuwe input te 
kunnen gebruiken. Tekst kan 
van de ene naar de andere lijn 
worden gecopieerd door: 
POKE781,va:sys59888:POKE1 
72,PEEK(60656 + na):POKE78 
0,PEEK(216 + na):sys59848. 
Hierin is va de regel waarvan 
en na de regel waarheen ge- 
copieerd wordt. 


NAAR DE 64-MODE 


Er bestaan twee mogelijkheden 
om vanuit de C-128 mode naar 
de 64 mode te gaan. De eerste 
is de meest bekende. Na het in- 
tikken van GO 64 springt de 
128 naar het blauwe scherm dat 


aangeeft dat u nu in de 64 mo- 
de zit. Een tweede mogelijkheid 
om de computer te resetten ter- 
wijl u de CBM-toets ingedrukt 
houdt. 


1571 VOLLEDIG BENUTTEN 


IN 64 MODE 


De 1571 disk drive kan op de 
C-128 mode dubbelzijdig ge- 
bruikt worden. Slechts weinig 
mensen weten dat u deze drive 
ook in de 64-stand van de 
C-128 dubbelzijdig kunt ge- 
bruiken. 

Er zijn twee manieren om dit te 
doen: 

— In de C-128 mode moet u 
met het commando HEADER 


een disk formatteren. Als u dan 
vervolgens naar de 64 mode 
gaat heeft u maar liefst 1328 
blokken vrij. 

— Op een C-64 of in de 
64-stand van de C-128 geeft u 
het commando OPEN 15,8,15, 
*UOMML’’. In dit geval nooit 
de opdracht CLOSE geven. U 
loopt anders het risico dat de 
computer vastloopt. 


ASCIIMAKER GEEFT UW C-64 STANDAARD ASCII 


Commodore-computers kennen 
helaas geen standaard ASCII. 
Destijds hebben de ontwerpers 
van de C-64 besloten een ei- 
gen ASCIl te ontwikkelen. Ge- 
volg is dat u met tal van ande- 
re, ‘professionelere’ computers 
moeilijk kunt communiceren. 
Het conversieprogramma 
ASCIIMAKER maakt een eind 
aan dat probleem. 


Heeft u ook weleens getracht 


een stuk tekst dat u had ge- 
schreven op uw Commodore 
64 via een modem over te sei- 
nen naar bij voorbeeld de Ap- 
ple van een kennis? Als u dat 
inderdaad heeft gedaan, dan 
zult u zonder meer van uw 
kennis te horen hebben gekre- 
gen dat hij onbegrijpelijke ‘rot- 
zooi’ op zijn scherm kreeg. 
Sindsdien bent u maar mei 
overseinen gestopt. En dat ter- 
wijl het u zo handig had gele- 


ken om op die manier brieven 
en dergelijken over te sturen. 
De reden van de ‘rotzooi’ op 
het beeldscherm van uw 
vriend is dat uw Commodore 
niet met standaard ASCII 
werkt, maar een variant daar- 
op kent. 

Met het programma ASCIIMA- 
KER zet u uw tekstfiles om in 
standaard ASCIl, zodat het 
overpiepen per modem van 
stukken tekst geen enkel pro- 
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bleem meer is. Uw vriend 
krijgt dan leesbare tekst op 
zijn scherm. 

Het programma dient te wor- 
den ingetoeist met de check- 
sum op pagina 37. Is het in- 
typwerk klaar dan runt u het 
programma, waarna u het naar 
standaard ASCII te converte- 
ren file moet worden ingela- 
den. De computer doet de 
rest. 





ASCIIMAKER 


100 
105 
110 
115 
120 
125 
130 
135 
140 
145 
150 
155 
160 
165 
170 
175 
180 
185 
190 
195 
200 
205 
210 
215 
220 
eo 
230 
235 
240 
245 
250 
259 
260 
265 
270 
275 
280 
ZB 
290 
295 


310 
315 
320 
325 
330 
330 
340 
345 





data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


032,008,194,007,158<sh/sp>36 


040,050,048,056,051<¢sh/sp>bb . 


041,032,040, 067,041<sh/spde9 
032,083,084,065,082<sh/sp>d2 
082,032,083,079,070<sh/sp>2e 
084,087,065,082,069<sh/sp>e5 
000,000, 000,000,076<sh/sp>c4 
051,009,014,008,147<sh/sp>43 
013,013,032,032,032<sh/sp>38 
032,042,042,042,042<sh/sp2Sa 
032,032,065,083,067<sh/sp>f3 
073,073,045,067,079<sh/sp>f7 
078,086,069,082,084<sh/spde4d 
069,082,032,086,049<sh/sp>21 
046,048,032,042,042<sh/sp>5a 
042,042,032,032,032<sh/sp>38 
0382,032,013,013,040<sh/sp>08 
049,057,056,054,041<sh/sp>99 
032,082,079,069,076<sh/sp)i4 
070,032,083,076,085<sh/sp>05 
077,065,078,032,045<sh/sp>3d 
032,083,084,065,082<sh/sp>d2 
082,032,083,079,070<sh/sp>2e 
084,087,065,082,069<sh/sp>e5 
013,013,013,068,073<sh/sp>?0l 
084,032,080,082,079<sh/spre7 
071,082,065,077,077<sh/sp>15 
065,032,086,069,082<sh/sp>12 
065,078,068, 069, 082<sh/sp>12 
084,032,067,079,077<sh/sp>35 
077,079,068,079,082<sh/sp?32 
069,045,065,083,067<sh/sp>f3 
073,073,013,073,078<sh/sp>d6 
032,078,079,082,077<sh/sp>e5 
065,065,076,032,065<sh/sp) 41 
083,067,073,073,046<sh/sp>ce 
013,013,013,070,073<sh/spdal 
076,069,078,065,065<sh/spodl 
077,032,040,077,065<sh/sp>11 
088,046,032,056,032<sh/sp>b8 
O75,065,0982,065,0/75<shn/sp ods 
084,069,082,083,041<sh/spde9 
058,032,000,087,044<sh/sp>2c 
083,044,067,083,065<sh/sp>fi 
046,032,032,009,208<sh/sp>50 
003,032,116, 164,072<sh/sp>00 
169,002,162,008, 160<sh/sp?40 
002,032,186,255, 104<sh/sp>28 
072,162,000, 160,002<sh/sp>b2 
032,189,255,032,192<sh/sp?48 
255,104,168,162,007<sh/sp>d7 
189,214,008,153,000<sh/sp>cO 
002, 200,202,016, 246<sh/sp> 46 
152,072,169,003, 162<sh/sp>f2 
008,160,003,032, 186<sh/sp> 4a 
255,104,162,000, 160¢sh/sp>c0 
002,032,189,255,076<sh/sp?34¢ 
192,255,133,251,168<sh/sp>f8 
136,048,010,185,000<sh/sp>40 
002,201,042, 208, 246<sh/sp>c6 
169,000,096, 165,251<sh/sp)13 
096,162,038, 160,008<sh/sp>b8 
032,139,009, 169,008¢sh/sp>48 
162,000, 160,000,032<sh/sp2h8 
161,009,032,222,008<sh/sp)98 


430 
435 
440 
445 
450 
455 
460 
465 
470 
475 
480 
485 
490 
495 
500 
505 
510 
515 
520 
525 
530 
535 
540 
545 
550 
555 
560 
565 
570 
575 
580 
$85 
590 
595 
600 
605 
610 
615 
620 
625 
630 
635 
640 
645 
650 
695 
660 
665 
670 
675 
680 


1000 
1010 


1020 


1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 


data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 
data 


169,147,032,210,255<sh/sp>67 
162,002,032,198,255<sh/spda7 
032,228,255,072,032<sh/sp>b8 
204,255,104,032,210<sh/sp>3a 
255,032,024,010,133<sh/sp?dd 
251,032,183, 255,133<sh/sp)>2d 
252,032,204, 255, 162<sh/sp>32 
003,032,201, 255, 165<sh/sp>35 
251,032,210, 255,032¢sh/sp?28 
204,255,032, 225,255<sh/spod7 
240,004, 165,252, 240<sh/sp>00 
205,169,002,032,195<sh/sp? 4b 
255,169,003,032, 195<sh/sp?4b 
255,076,116,164,134<sh/sp>fe 
251,132,252,160, 000<sh/sp>bO 
177,251,240,011,032<sh/spre8 
210,255,230,251, 208<sh/sp>f0 
243,230,252, 208,239<sh/sp?c7 
096,133,252,224,000<sh/sp>bo 
208,004, 192,000, 240<sh/sp>cO0 
004,024,032, 240, 255<sh/sp?c7 
169,000,133,251,169<sh/sp>f9 
164,032,210, 255, 169<sh/sp>39 
157,032,210, 255,032<sh/sp?28 
225,255,240,009,032<sh/sp>48 
228,255,201,013,208<sh/sp?10 
003,165, 251,096,201<sh/sp>39 
020,208,028, 164,251<sh/sp>03 
240,233,198,251,136<sh/sp>f0 
169,032,153,000,002<sh/sp)b2 
162,002,189,233,009<sh/sp>c9 
032,210,255, 202,016<sh/sp>58 
247,048,202,157,157<sh/sp?ris 
032,201,032,144,205<sh/sp>bd 
201,192,176,004,201<sh/sp>f9 
128,176,197,164,251<sh/sp>03 
196,252,240,191,153<sh/sp?31 
000,002,032,210,255<sh/sp>67 
230,251,208,171,029<sh/spded 
157,017,145,009,008<sh/sp) 48 
010,011,009,008,010<sh/sp>32 
011,029,157,017,145<sh/sp?51 
132,253, 134,254, 160<sh/sp>20 
007,217,008,010,240<sh/sp2e0 
005,136,016,248,048<sh/sp>40 
003,185,016,010,170<sh/spre2 
041,064,208,004,138<sh/sp?>02 
076,065,010,138,041<sh/sp)d9 
128,208,005, 138,009<sh/sp>da9 
032,208,003, 138,041<sh/sp)d9 
127,166,253, 164,254<sh/sp>06 
096,044<sh/sp>bc 


printchr$(147)<sh/sp>0f 
forx=2049 to 2630<sh/sp>5e 


reada:ck=ckta:printchrs(i9)ck 
:next<sh/sp)>2a 
Lick=59918then1050<sh/sp?12 
print"data error! ":stop<sh/sp>14 
restore<sh/sp>c8 

forx=2049 to 2630<sh/sp>5e 
reada:pokex,a:ck=ck-a<sh/sp)>1b 
printchrs(147)ck<sh/sp>0d 
next<sh/sp>0e 

poke4d5,70:poke46, 10:end<sh/sp>3c 
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Voor bepaalde programmeer-toepassingen 
lijkt de computertaal Basic te traag. Bi 
e- 


sprites bij voorbeeld. John Vanderaart kunnen schieten. 


Het grootste probleem van de 
Basic-programmeur is het ge- 
brek aan snelheid van deze 
computertaal. We kunnen ge- 
rust stellen dat basic langzaam 
is. Hoe traag blijkt wel als u 
probeert een goed programma 
te schrijven. ‘Vier op een rij’ 
gaat nog wel en een redelijke 
adventure wil ook nog wel luk- 
ken. Ook voor bestands- 
programma’s met veel reken- 
werk blijkt Basic zo gek nog 
niet. De moeilijkheden begin- 
nen pas bij de echte spelpro- 
grammering. 

Zoals iedereen wel zal weten 
biedt de C-64 ons de mogelijk- 
heid om onder meer acht spri- 
tes te gebruiken. En dat is 
heel mooi, vooral als je je rea- 


SPRITES OP DE LOOP 


1000 
1010 
1020 
1030 
1040 
1050 
1060 


rem 
rem 
rein 
rem 
:<sh/sp?62 


liseert dat je op de Vic-20 of 
C-16 maar wat met program- 
meerbare karakters moet aan- 
rommelen. 

In Basic echter zijn die sprites 
echter bijna niet aan de gang 
te krijgen. Een aantal uitbrei- 
dingen, zoals Simon’s Basic of 
G-Pascal, biedt wel wat uit- 
komst, maar vreten geheugen- 
ruimte, of zijn niet ‘on-line’ be- 
schikbaar. Bovendien geven 
deze hulpmiddelen geen echte 
snelheid. 

Voor de ’doe-het-zelvers’ on- 
der ons heb ik iets geschreven 
waar ze misschien veel plezier 
aan kunnen beleven. Niet al- 
leen de Basic-programmeurs 
hebben er wat aan, maar ook 
de machinetaal-programmeurs 


clr:restore<sh/sp>60 
poke53280,1:poke53281,1:print"sprite-demo":print” 


geduld..."<sh/sp>a6é 


1070 
1080 
1090 


:<sh/sp>8e 


:<sh/sp>cs 


rem xx* pointers naar m-code 


1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
iszo 
1330 
1340 
1350 
1360 
1370 
1380 
1390 


init=50000<sh/sp>e0 
richting=51000<sh/sp?28 
speed=51008<sh/sp>f0 
beweeg=51088<sh/sp>cO 
teller=51016<sh/sp>70 
tabel=51024<sh/sp?f0 
animeer=51089<sh/sp>sl 
:(sh/sp>66 

rem *kx sprites aanmaken 

rem xxx 128/129/130/131 
2<sh/spraz 
fora=0to255<sh/sp>87 

: yreadb:poke2x4096+a,b<sh/sp?6e 
nexta<sh/sp?6d 

:<sh/sp>f2 

yem **x Sprites initial iseren 
rem xxx vormen, Kleur etc... 
:<sh/sp>le 

fora=O0to7<sh/sp>3f 


nexta<sh/sp?89 

:<sh/sp>70 
poke53280,000:poke53281,000<sh/sp>c0 
poke53285,001:poke53286,009<sh/sp>19 
poke53276,255:poke53271,255<sh/sp>b7 
poke53277,2595: poke53269, 255<sh/sp?17 
:<sh/spde4 

rem xxx m-code aktiveren 
:<sh/spofc 
sysinit<sh/sp?a6 


poke 2040+a, 128: poke53287+a,11<sh/sp>cb 


wijst echter dat ook in Basic sprites met 
een enorme snelheid over het scherm 


kunnen er hun voordeel mee 
doen. 

De beste manier om dit ‘iets’ 
eens te aanschouwen is om 
als eerste de ‘loader’ in te tik- 
ken (en te saven). Daarna runt 
u het. De machinecode zit er- 
gens op het gebied dat loopt 
van $c000 to $cfff en is dus, 
met behulp van een monitor 
op $8000, weg te saven naar 
cassette of schijf. Dit gebied is 
bovendien NEW- en RESET- 
bestendig. 

Als dit is gedaan tikt u het 
testprogramma in. Als u het 
runt hoeft u alleen maar de 
vuurknop van uw joystick (in 
poort twee) in te drukken en te 
kijken wat er gebeurt. 

Voor de machinetaal-freaks on- 


JOO ok obbckkk« (sh /sp>d6 
kkk test programmaatje *xx<sh/sp?Ze 
xxx bij m-code 
JO odkkdodook sk Csh / sp? dé 


*xxx<sh/sprae 


*xx<sh/sprae 


zkxkk<sh/sp>06 
xxx¢sh/sp>be 


xkk¢sh/spre6 
xxx<sh/sp?f6 


xkkx¢sh/sp>66 
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der ons heb ik er ook nog een 
assembler-listing bijgedaan. 
(Assembler is machine-code in 
Basic-regels geschreven. Voor- 
deel is dat het beter leesbaar 
wordt en makkelijker aan te 
passen is). Natuurlijk is het 
programma ook met behulp 
van een monitor in te voeren. 
Als u met onze Monitor 50000 
wilt intoetsen moet er rekening 
mee houden dat de code ver- 
plaatst zal moeten worden, 
aangezien Monitor 50000 op 
hetzelide geheugengebied 
draait. 

Het programma is natuurlijk 
aan te passen. Sterker nog, ik 
denk dat een creatieve compu- 
tergebruiker er een bijzonder 
fraaie ‘shoot’em up’- game in 
kan schrijven. 

Nog even wat tips: 

-Zoek eens uit hoe ‘animeer’ 
en ‘beweeg’ werken. Poke er 
eens een ander getal in dan 
255 en denk hierbij aan de 
werking van de sprite- 
msb-byte. 

-Gebruik uw eigen spritevor- 
men. Houdt er rekening mee 
dat het om een cyclische tabel 
met lengte acht gaat. 

-Met ‘richting’ zijn ook zeer 
zinvolle dingen te doen. Bij 
voorbeeld continu ophogen, 
onmiddellijk omdraaien, ran- 
dom sturen ,etc. 

Succes ermee! 
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1400 :<sh/sp>34 
1410 rem ***x tabellen voor m-code *kkk<Sh/sprae 
1420 rem *xx initialiseren zAkKCShH/Sp)e6 
1430 :<sh/sp>60 
1440 fora=Oto7<sh/spd3f 
1450 : pokerichting+a,a<sh/sp>5d 
1460 : pokespeedt+a,ax3+3<sh/sp>83 
1470 : poketellerta,9-a<sh/sp>2b 
1480 : readb<sh/sp>a0d 
1490 :: forc=Oto7<sh/sp>9f 
1500 ::: poketabel+8xct+a,b<sh/sp>9e 
1510 .: nexte<ch/sp>27r 
1520 nexta<sh/sp>19 
1530 :<sh/sp>3s 
1540 rem *x* opstarten van zowel de *xx<sh/sp >ce 
1550 rem xxx de beweging, als de x*kx¢sh/sp>Ge 
1560 rem xxx animatie *kx<sh/sp) le. 
1570 :<sh/sp>82 
1580 pokebeweeg, 255: pokeanimeer, 255<sh/sp?47 
1590 :<sh/sp>9a 
1600 rem xxx Gdemootje *xxx<sh/spdae 
1610 :<sh/spod2 

1620 ifpeek(56320)andi6éthen!l620<sh/spde4 
1630 fora=Oto7:pokerichtingta, int(rndcO)*x15)orl<sh/spdad 
1640 pokespeedta, int(rnd(0)x*x30)orl:next:gotol620<sh/sp>44 
1650 :<sh/sp>22 
1660 rem xxx spritevormen xxx<(sh/sp>86 


1670 :<sh/sp>3a 2120 data000,128,000<sh/sp>bo 
1680 datad00,008,000<sh/sp>30 2130 data002,096,000<sh/sp)30 
1690 data000,038,000<sh/sp)90 2140 data000,128,000<sh/sp>bO 
1700 data000, 008, 000<sh/sp>30 2150 data000, 000, 000<sh/sp>bo 
1710 data000, 000, 000<sh/sp>bO 2160 data000,032,000<sh/sp>30 
1720 data000,032,000<sh/sp>30 2170 data032,032,032<sh/sp>38 
1730 dataddd,032,000<sh/sp>30 2180 data034,002,032<sh/sp>d8 
1740 data002,002,000<sh/sp>dO 2190 data034,138,032<sh/sp>d8 
1750 data002,138,000<sh/sp?do 2200 datal68,168,168<sh/sp>48 
1760 data000, 168,000<sh/sp>30 2210 datai91,103,248<sh/sp>38 
1770 data008,100,128<sh/sp>00 2220 datal88,168,248<sh/sp>48 
1780 data042,170,160<sh/sp>e0 2230 datal28,032,008<sh/sp>38 
1790 data011,239,128<sh/sp?30 2240 datal28,032,008<sh/sp> 38 
1800 data047,035,224<sh/sp>70 2250 datad00,000,000<sh/sp>bo 
1810 data044,000,224<sh/sp>cO 2260 datad00,000,000<sh/sp>bo 
1820 data04d4, 000, 224<sh/sp>cO 2270 data000,000,000<sh/sp>bo 
1830 data04d4,000,224<sh/sp>cO 2280 datad000,000, 000<sh/sp>b0 
1840 data032,000,032<sh/sp>b8 2290 data000,000,000<sh/sp>bo 
1850 datad08,000,128<sh/sp>cO0 2300 data000,000,000, 000<sh/sp>bo 
1860 data000,000,000¢sh/sp>bo 2310 data000,000,000<sh/sp>bo 
1870 datad00,000, 000<sh/sp>bo 2320 datad00,000,000<sh/sp>boO 
1880 data000,000,000, 000<sh/sp>bo 2330 data000,000,000<sh/sp>bo 
1890 datad00, 000, 000<sh/sp>bO 2340 datad00,032,000<sh/sp>?30 
1900 data000,032,000<sh/sp>30 2350 data000, 168,000<sh/sp>30 
1910 data000,152,000<sh/sp>bO ~~ 2360 data008,032,128<sh/sp>40 
1920 datad000,032,000<sh/sp>30 2370 data056,000,176<sh/sp>c8 
1930 data000,000,000<sh/sp>b0 2380 data056,032,176<sh/sp>48 
1940 data000,032,000<sh/sp>30 2390 data032,032,032<sh/sp>38 
1950 data000,032,000<sh/sp>30 2400 data034,002,032<sh/sp>d8 
1960 data002,002,000<sh/sp?d0 2410 data034,138,032<sh/sp>d8 
1970 data002,138,000<sh/sp>d0 2420 data032,168,032<sh/sp>38 
1980 data032,168,032<sh/sp>38 2430 data059,103,176<sh/sp>38 
1990 data042,102,160<sh/sp>20 2440 data063,171,240<sh/sp>f0 
2000 data043,171,160<sh/sp>f0 2450 data012,032,192<sh/sp>48 
2010 datal75,035,232<sh/sp>70 2460 data000,032,000<sh/sp>30 
2020 datal88,032,248<sh/sp>48 2470 datad00,000,000<sh/sp>bo 
2030 datai76,000,056<sh/sp?cO 2480 datad00,000,000<sh/sp?ho 
2040 datai28,000,008<sh/sp>b8 2490 datad00,000, 000<sh/sp>bo 
2050 datad00,000,000<sh/sp>bo 2500 dataddd0, 000,000<sh/sp)bO0 
2060 datad000, 000, 000<sh/sp>bO 2510 datad000,000, 000, 000<sh/sp>bO 
2070 dataQ00,000,000<sh/sp>b0 2520 :<sh/sp7de 

2080 datad00,000,000<sh/sp>bo 2530 rem *xx animatiecyclus x«xx<sh/sp>ce 
2090 data000,000,000,000¢sh/sp>bO 2540 :<sh/sp>04 

2100 data000,000,000<sh/sp>bo 2550 datail28,129,130,131<sh/sp>5b 


2110 data000,000,000<sh/sp>bo 2560 datal31,130,129,128<sh/sp>d0 
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Abonnees van Commodore Dossier Aktief kunnen in deze ru- 


briek kosteloos een advertentie plaatsen. De service is uit- 
sluitend bedoeld voor particulieren. Puur commerciéle adver- 
tenties en seaueaiel van illegale programmatuur worden 
geweigerd. De redactie is niet verantwoordelijk voor fouten 
als gevolg van onduidelijke opgave. 

Een advertentie mag ten hoogste 7 regels van 25 aanslagen 


lang zijn. 


IK WIL RUILEN 

@ CBNM-64 software te ruil, disk en cas- 
sette. Stuur uw lijst naar M.Bijma, Kof 
18, 8531 AT Lemmer. 


@ Op mijn schijven staat geen rommel! 
tk wil goede en geavanceerde software 
tuilen, ook evi. in vreemde talen (Itali- 
aans, Noors ete.). Stuur lijst naar 
R.Draaisma, W.E.straat 36, 8401 RK Gor- 
redijk, 


@ C-64 spel en gebruiksprogr. Ik wil ook 
handleidingen. stuur lijst + tel.nr. naar 
H.Spanjaard, Groenelaantje 19, 1815 VA 
Alkmaar. Tel. 072-113297 (na 18.00 
uur) 


@ ik wil graag spelletjes ruilen op tape 
C-64. stuur fijst 4+- bandje naar W.Bos- 

man, Gebbeweg 71, 3192 GC Hoogviiet. 
Tel. 010-382908. 


@ Gezocht: Oxford Pascal op tape. Aan- 
geboden: ca. 1000 prog. op disk en tape 
”C-64-Fan’”, Mina Krusemanstraat 159, 
7513 HE Enschede. 


@ CBM spellen ong.300 (geen disk-drive) 
stuur je lijst naar €.Bendermacher, 
St.Maartensweg 8, 6255 AP Noorbeek. 
Je krijgt mijn lijst ook. Tel. 04457-1623. 


@ C-64:wie wil er software ruilen op ta- 
pe. stuur lijst naar Y.Lindenboom, Sme- 
denstraat 228, 7411 RB Deventer. 


@ C-64 spelletjes. Stuur lijst + telnr. 
naar J. Kaptein, Bakkerstr.27, 2012 ZH 
Haarlem. Tel.023-311120. 


@ 6-64 programma’s. Ik ben in bezit van 
ang.600 pry. €.Sinke, Meidoornstr.5, 
2851 TR Haastrecht. 


@ CBM software. Stuur lijst + tel.nr. 
naar Fons de Munck, Steven v.d. Hag- 
henstr.11, 3151 CN Hoek van Holland. 


@ CBM-software ong. 1700 programma’s. 
G. de Meyer, G.v/d Heuvelstr.40, 3140 
Ramsel Belgié. 


@ CBM-64 spelletjes op tape. zelf heb ik © 


ong. 350 spelletjes. stuur lijst + bandje 
naar Mare Schiphorst, Leeuwenburg 16, 
7608 VM Almelo. 


@ C-64 software ruilen op tape. Voorkeur 
voor tekenprogramma’s en adventures. 
Stuur lijst naar J. Atienzan, Hengelo- 
sestr.162, 7521 AK Enschede. 


@ Wie wil C-64 spelletjes ruilen. ruim 
550 (cassette). stuur uw lijst naar D. 
Kuyper, JH. o/d Veldestr.6, 1505 2P 
Zaandam. Tel. 075-355530. 


@ CBM-64 software te ruil. ong.150 prg. 
Peter v.Welzen, Kuiperstraat 5, 2801 NR 
Gouda. Tel.01820-15604. 


@ €-64 alle soorten spelen. Zelf 100 a 
110 spelen. Tom de Ruyter Tel. (tussen 
18.00 en 19,00 uur) 01853-1983. 


@ C-16 software (ook voor +4): ik heb 
o.a.: A.C.E. Sword of Destiny, Starfighter 
en Ofimpiad + 30 Basic-spelen. Floris, 
tel.04118-1661. 





@ Ruim 100 programma’s te ruil, stuur 
je lijst naar J.D.Dory, Dantelaan 119, 
3533 VC Utrecht. 


@ CBM-software op cassette + lijst 
opsturen naar B.Sloot, Kruistr.12, 8471 
HH Wolvega. cassette + mijn lijst + 
software spoedig retour. Tel. (na 18.00 
uur) 05610-3438. 


@ CBM-64 programma’s op tape. Zelf 
heb ik ca.500 prgs. stuur uw lijst naar 
J.Hakkert, Pr.Bernhardlaan 78, 7221 BD 
Steenderen. 


@ C-64 software (disk of tape). Ik ben 
vooral op zoek naar Fortran voor gebruik 
zonder CPM. stuur uw lijst naar Philippe 
van Honacker, Mechelbaan 30, B-1860 
Meise Belgie. 


@ Programma’s op tape. tk ben in hezit 
van 250 prg’s. L.Nimmegeers. Zandrede 
31, 9210 Destelbergen, Beigie. 


@ CBM-64:ik bezit 2000 prq’s en wens 
meer. (alleen disk) Ik bezit bijna alle 
nieuwste software. Y.Pypes, Spalaan 19, 
8400 Oostende Belgie. 


@ CBM-64 programma’s op cassette. 
stuur je lijst naar T.Vermunt, Flintdijk 
152, 4706 JW Roosendaal. 


@ Wie wil er C-64 spelletjes ruilen (evt. 
kopen)? Bel Edwin, 05210-13698. 


@ CBM-64 software op cassette. ca. 
1500 programma’s. stuur je lijst naar 
d.v/d Berg, v.Tijnplein 2, 2671 HP Naald- 
wijk. Tel.01740-30285. 


@ Ben op zoek naar iemand met wie ik 
€-64 software kan ruilen. Graag iemand 
in Enschede. J.Oudenbroek (12 jr.), Pik- 
senbrink 5, 7544 BE Enschede. tel. 
053-766776. 


@ Wie kan mij helpen aan de linsting 
van Database uit Comm.Dossier nr.0. Rui- 
len tegen ander educatief of spel. C. Lau- 
werijssen, Rooseveltplein 68, 5025 WV 
Tilburg. Tel.013-630792. 


@ Ik bezit 300 prg’s, hoofdzakelijk spel- 
letjes, en wil graag ruilen. Tevens progr. 
gevraagd voor lichipen C-64. 
Tel.02207-41793. 


@ CWB-64 programma’s op disk. Ik heb 
ca.1300 prg’s. Zoek gekke programma’s. 
Stuur lijst naar B. v. Wijk, Langestraat 
36, 7891 GB Klazienaveen. 


OVERIGEN 

@ Wie heeft een lijst van tel.nrs. van 
Bulletin Boards in Nederland? Ik heb zelf 
ong. 190 nrs. Fred Saver, Hankemaborg 
39, 7608 DD Almelo. Tel. (na 18.00 uur) 
05490-68353 


@ Wie helpt mij tegen vergoeding aan 
een Nederlandse handleiding voor de 
€-647 R. vid Brug, 6545 GV Enschede. 


@ Help! Ik heb tips nodig voor Valkyrie 
17 (Ramjam) en Eric de Vicking (level 9). 
J. de wit, Holleweg 171, 4623 XD Ber- 
gen op Zoom. Te.01640-65883. 


@ Wie kan mij helpen aan div. beschrij- 
vingen van programma’s op CBM-64. F.D. 
Bloemendaal, Zwitserlaan 15, 9231 HJ 
Surhuisterveen. Tel.05124-4261. 


®@ Gevraagd: beschrijving van het pro- 
gramma Sequence li (Synthesizer) + ook 
andere muziek- of geluidsprogramma’s + 
progr. voor uitprinten tek. V. v/d Horst, 
Eindstede 73, 2543 BJ Den Haag. Tel. 
070-292511. 


® Wie helpt mij aan programma’s van 
zelfbouwprojecten voor C-64. Alles wel- 
kom,kosten vergoed. R.Kleyne, Duinrand 
4, 1949 CA Wijk aan Zee. 
Tel.02517-4559. 


@ Wie heipt mij aan kopie handleiding: 
VIC-Stat/Vic-Graf./Vic-Forth. en het hoofd- 
programma Vic-picture, tegen vergoeding 
of ruilmateriaal. R.O.Wolven, Mei- 
doornstraat 7, 3222 XL Hellevoetsluis. 
Tel.01883-17922. 


@ Wie kan mij helpen aan printer voor 
CBM-64. Ben beginneling. G. Suijlen, Bor- 
neostr.12, 6045 VX Roermond. 


@ Gevraagd: Nul-nummer van Commodore 
Dossier. H. de Jong, Vriezeweg 63, 6653 
AH Deest. Tel.08870-3812. 


IK ZOEK HARDWARE 

EN WIL RUILEN 

@ Gevr.: MPS-801, 803 of Seikshosag 
P100 VC voor plm. f 225,-. Tevens 
softw. (750 titels) te ruilen. R. Remmig, 
Leeuwerikkenhof 36, 3181 T0 Rozenburg 
ZH. Tel. 01819-17429. 


@ Gevr.: diskdrive 1541 voor pim. 
f 300,-. Tevens softw. te ruilen. Tel. 
01819-15988. 


@ Te koop gevr.: Modulator voor ViC-20. 
Event. ook te ruilen tegen softw. voor 
ViC-20 of C-64. K.R. Mulder. Tel. 
03404-24389. 


IK ZOEK SOFTWARE 

@ Omdat mijn schijt verioren is gegaan 
zoek ik een Tekstverw/cale progr. van 
Zero 80 kolkrt. M. Schaaf te Rotterdam. 
Tel. 010-559065. 


@ Een taalprogr. Frans waarmee zelf 
woordjes + vertaling kan invoeren en 
oproepen. Tegen ki. vergoeding. M. Schils 
te Lanklaar (Belgie). Tel. (na 17 uur) 
09-32.11,756805. 


@ Voor Commodore C-16. G. Kip te 
Goes. Tel. 01100-30339. 


@ Een progr. op CBM-64 v. Leidingbere- 
kenen NEN 1010 derde druk. Welkom op 
tape, disk of listing. G. Rebel, P Heinstr 
9, 1271 SJ Huizen. Tel. 02152-56076. 


@ C-compiler voor CBM-64. W. Ogiers, W 
Haecklaan 14 — Bus 11, B-2100 Deurne 
(Belgie). Tel. (na 17 uur) 03-321.45.94. 


@ Wie kan mij helpen aan softw. voor de 
C-16. Heb zelf weinig, mag cok zelfge- 
maakte progr. zijn. Tel. (na 17 uur) 
03465-69055. 


@ Gevr.; Edukatieve progr, op cassette 
voor C-64 op basisschool-niveau. On- 
kosten worden vergoed. P.W. van Delft, 
Middelhovenweg 40, 1502 ED Zaandam. 
Tel. 075-355674. 


@ Wie heeft poke’s voor meer levens op 
meer manneties. Ook poke’s voor truukjes 
met de CBM-64. R. de Groot, Hermannus- 
hof 20, 3274 CE Heinenoord. Tel. (na 
15.30 uur) 01862-1887. 
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@ Ik zoek een progr. voor het bijhouden 
van bowlingscores op CBM-64. L. Ter- 
jouw, Viiegerzeil 15, 2924 BX Krimpen 
ad Yssel. 


@ |k zoek progr. voor Commodore 128. 
Ook interesse in plotprogr. etc. P. Steen- 
bekkers, Meierifhoeven 50, 5244 HW 

Rosmalen, Tel. 04792-16006 of 15004. 


@ Student zoekt progr. van het Ned. 
woordenboek. Het moet geschikt zijn om 
de woorden mee op te zoeken. Event. kl. 
vergoeding. R. Webbe, Sportlaan 63, 
3851 CA Ermelo. 


@ Gevr. PGM — Listings uit com.dos.0 
+ spectrum -analyzer van Adam Curry uit 
countdown (event. schema). G. Noben, A 
Sniedersstr. 41, B-2008 Antwerpen. 


@ Wie kan mij helpen aan beursprogr. op 
cass. of disk. F. Gilbert, Engelendalelaan 
70, B-8310 Brugge. Tel. (na 19 uur) 
050-350001. 


@ Ik zoek grat. 3-D tekenprogr. Tevens 
GBM-64 versie van Tutsim van de TH — 
Twenthe (op tape). J. Kalthof, L v Heilstr 
78, 4827 AN Breda. Tel. 076-875701. 


@ Gevr.: software voor de €-16. IR. 
Iding, Rietdekkersdreef 415, 7328 AE 
Apeldoorn. 


@ Progr. voor MSX met IBM Compatibelle 
printer, Ook eenv. aan te passen progr. 
Alles is welkom. Event. onkosten worden 
vergoed. A.J. vd Berg, Esdoornlaan 43, 
3881 ER Putten. Tel. 03418-51171. 


@ Ik zoek intell. progr. voor CBM-64. J. 
Defraene, Veugeleer 169, B-1500 Halle 
(Belgie). Tel. 02-356.22.13. 


@ Gevr.: boekhoudprogr. en programma 
RITY voor de C-64. Frieda Heye, Ton- 
nesir 34, B-9800 Deinze (Belgie). 


@ Wie kan mij helpen aan een lopend 
exemplaar van het bioritmeprogr. uit C.D. 
1? Ook astrologieprogr. zijn zeer welkom. 
Bert Leentvaar. Tel. ('s avonds) 
020-437834. 


@ Gevr.: progr. voor het bijhouden hit- 
lijsten -top 40 op disk voor CBM-64. 
Event. tegen red. verg. Mare de Vreede, 
Lepelaarsingel 496, 3136 PN Viaardingen. 


@ Wie heeft tegen verg. Flight — simula- 
tor Il met handl. op tape of disk. Tel. 
01831-3248. 


@ Ik zoek een zeer groot platenbestand 
(plm. 4000 titels) voor C-128. Andre van 
Well, Hogeweg 56, 6659 AK Wamel. 


IK aK SFEWARE 

EN WIL RUILE! 

@ Wie heeft voor mij de casette:’Het 
mysterie v. Arendarvon castle’. Event. te- 
gen verg. of ruilen met andere games. B. 


Jacobs, Bloemenstr. 10, B-2958 Zemst 
(Belgie). 


@ Gevr.: progr. tbv. componeren muziek 
met printmogelijkheid. Tevens zakelijke 
(top) software, graphics. Ruiling mogelijk. 
H. Jansen, Weissenbruchstr. 121, 2596 
GD s Gravenhage. Tel. 070-247579. - 


@ Tegen kl. verg. of ruilen gevr. voor 
CBM-64 progr. van Viza — software (bijv. 
Vizastar -Vizaspell) L. Lamotte — Haesen- 
donck, Kan Bittremieuxlaan 57, B-8340 
Damme — Sijsele (Belgie). 


@ Te koop gevr.: printshop voor disk. 
Event. ook te ruilen. Peter van Nes. Tel. 
02979-4378. 





ODT LoT 


IK ZOEK SOFTWARE EN OVERIGEN 
@ Ik zoek simulators van andere compu- 
ters voor de CBM-64. Tevens Simons Ba- 
sic handboek gezocht. Event, tegen beta- 
ling. Ook progr. van Simons Basie zijn 
welkom. M.J. vd Kieij, Dijkhof 30, 6715 
DX Ede Gid. Tel. 08380-21402. 


IK WIL RUILEN 
®@ Softw. voor de CBM-64. Patricia vd 
Heijkant. Tel. 01623-17860. 


® Progr. voor de CBM-64. Alleen vanaf 
cassette. Ton van Heyst. Tel. 
010-825404. 


@ Wie heeft softw. voor de C-16 (liefst 
machine-taal) te ruilen. Tevens MPS-801 
te koop gevr. B. Oversier, Vendelstr. 2, 
5268 CW Helvoirt. 


@ Komplete C-64 uitrusting tegen MSX 
uitrusting. Heb ook prof. softw. voo C-64. 
J.C. van Gils te Raamsdonk. Tel. 
01621-20865. 


@ Realis + 1€ OX-300 wereldontvanger. 
Prijs: f 550,- of ruilen tegen goedwerken- 
de discdrive 1541. H.A. Pijpker, Smits- 
weg 20, 9982 HT Uithuizermeeden. Tel. 
05954-13129. 


@ Sharp MZ731 (ingeb. cass. + prin- 
ter/plotter) met software ruilen voor een 
1541 diskdrive + diskturbo voor een 
CBM-64 + cass.rec. Tel. 010-323465. 


OVERIGEN 

@ Wie heeft voor mij ter inzage Compu- 
te’s Gazette van juli 1984. W. Jansen, 
Goirkestr. 137, 5046 GG Tilburg. Tel. 
013-431233. 


@ Te koop: Oefenboek voor Simens Basic 
van Data Becker (z.g.a.n.). Prijs: f 20,-. 
T.J. de Haan, Gooilandiaan 71, 8443 BG 
Heerenveen. Tel. 05130-32589. 


IK BIED AAN HARDWARE 

@ Alphacom VP42 printer; 40 tekens 
0.a. grafisch met papier (1/2 jr. oud). 
Thermische printer. Prijs: f 150,-. Tel. 
03450-17845. 


@ Vic-20, 16 Kram uitbr. (schakelbaar), 
boeken, cass.rec., progr. en Rompacks. 
Totaalprijs: Bir 3000. Danny Tuypens, E 
Banningsstr. 12, B-1050 Brussel. 


© Copieerapparaatje voor cassettes. Prijs: 
{ 27,50. Tel. (na 18 uur) 030-717849. 


@ MPS 802 comm. matrix printer (neg 
geen jr. oud). Prijs: f 600,-. C. de Bra te 
Stolzenau (B.R.D.). Tel. (09.49) 
57613443. 


@ Spectravideo comp. 32K/80K super 
expander, dubb. diskdr., softw.pakket, 
16K Ram cacio — 64K Ram cacio, data- 
record., mon., en 2 joyst. Alles in een 
koop: f 2500,-. Tel. 03455-4091. 


@ CBM-64 + drive + Cass. + Speed- 
dosplus + Kesdiskcards + Veel boeken 
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en softw. Prijs: f 1500,-. F. van 
Haastrecht, Middenweg 64, 2371 GS Roe- 
tofarendsveen. Tel. 01713-4552. 


@ C-16 + datarec. + softw. + ned. 
handl. Prijs: f 200,-; Datarec. v. VIC of 
C-64. Prijs: f 75,-; Basiccursus v. VIC in- 
Cl. 2 cass. Prijs: f 15,-; Ned. handl. VIC. 
Prijs: f 10,-; Boeken: C-64 (sicker), Prijs: 
f 15,-; Best. v. comm. comp. Prijs: 

f 15,-; MT cass. 7501 C-16. Prijs: f 10,- 
; Spelcass. (20 games) C-16. Prijs: f 15,- 
; Joystickverloop Atari — 0-16. Prijs: 

f 10,-. Tel. 01880-40883. 


@ C-64 + 2 joysi. + 6 boeken + Si- 
mons Basic + 300 progr, + datarec. 
Prijs: f 800,-. Tel. (na 16.30 uur) 
020-179800. 


@ Lichtpen + softw. v. VIC en C-64. 
Prijs: f 50,-; Anti-load-error. Prijs: ¢ 25,-; 
Orig. VIC-20 softw. (ook voor 16K). Tel. 
(tussen 18.30 en 19.30) 01613-1937. 


@ ViC-20 + switcheble 16K Ram geheu- 
gen uitbr. + softw. + boeken. Prijs: 
fF 200,-. Tel. 01650-40104. 


@ K Ram cartridge (geheugenuitbr.) voor 
ViC-20 en enkele boeken. R.M.A. Brus- 
saard te Heerlen. Tel. 045-223414. 


@ C-64 + datarec. + softw. Prijs: 
f 700,-. Tel. 05281-703. 


@ SV328 + expand 605 met diskdr., 
mon., CP/M, MSX adaptable, 80kolkrt. en 
cass.rec. Alles in een koop. Prijs: 

f 2500,-. Tel. 01718-23350. 


@ MPS-802 (6 mnd. oud) + lint (orig. 
verpakk. en in uitst. staat). Prijs: Bfr 
9000 of Hil 500,-. W. Simons, € Buys- 
sestr. 82, B-2020 Antwerpen. 


@ Expansion board 4-slots + mach-taal- 
mon. + prog-aid + superexpander (3K) 
+ 8K-sw. Ram. Voor VIC-20. Prijs: 

f 300,-. M.A. Stips. Tel. (na 18 uur) 
02963-1034. 


@ Datarec. (Commander) (1/2 jr. oud). 
Prijs: { 90,-. A. van Barneveld te Lopik. 
Tel. 03475-1600. 


@ KCS speedioader combi cartridge: in- 
geb. machine-taal mon., toolkit (16 nieu- 
we commando’s) + handl. Prijs: f 50,-. 
Tel. 072-157003. 


@ CBM SFD1001 diskdr. + interf v. 
€-64, opslageap. 1,2M, 6x sneller als 
1541 voile dig. basic compatible. Prijs: 
f 1250,-. Tel. 02290-36377. 


@ Lambda comp.-tel. met 100 progr. ge- 
heugens + klok met 3 wereldtijden + 
stopwateh + handl. Prijs: f 795,- voor 

f 300,-. Tel. 04707-1721. 


@ Radar-Basic-50K (2 mnd. oud) voor de 
echte programmeur. Andre Kamman te 
Wyster. Tel. 05936-6718. 


@ C-64 + mon. + printer + diskdr 
1541 + datasette + 104 floppy’s met 
1000 progr. + 2 arcade joyst. + div. 
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boeken. (alles 4 imnd. oud). W. Groene- 
veld fe Viaardingen. Tel. 010-356017. 


@ V98010 Philips MSX + cass.rec. + 2 
joyst. + softw. + z/w TV (alles 1/2 jr. 
oud). Prijs: { 750,-.H vd Heuvel, v War- 
mondiaan 7, 2241 RP Wassenaar. Tel. 
01751-10183. 


@ €-64 + 1541 + KCS diskiool + paar 
progr. E. Sacre te Relegem (Belgie). Tota- 
le prijs: Bfr 18000. Tel. (na 18 uur) 
02-460.22.59. 


@ Teletron 1200 modem. Prijs: f 498,-. 
Tel. 05443-72020. 


@ CBM-64 1541 diskdr. + turbomodule 
4+ MPS-801 printer + 70 diskettes + 
ruim 1000 progr. + Simons Basic module 
+ CBM tijdsehr. + boeken en diskkoeler. 
Vraagprijs: f 2000,-. Tel. 073-416490. 


@ Radarbasic-50K (nieuw, als prijs ge- 
wonnen). Prijs: f 60,-. P. huinink, Sche- 
penenstr. 36, 6525 XJ Nymegen. Tel. 
080-554488. 


@ Radarbasic-50K disk en cass. DOS, ba- 
sictool bv.: renumber incl. goto’s — go- 
sub’s. (1 mnd. oud) Vraagprijs: f 85,-. C. 
Warmerdam, Herenweg 26, 2211 CD 
Noordwykerhout. Tel. (na 19 uur) 
02523-73069. 


@ CBM-64 + Simons Basic + 250 
progr. + stofkap en 3 boeken. Prijs: Hil 
670,-. R. Neirynek, Baliestr. 33, B-8000 
Brugge. 


@ Atari spelcomp. met 2 joyst. en car- 
tridge: spaceinvaders en donkeykong. 
Prijs: f 100,-. Tel. 01719-10632. 


@ CBM-64 + datasette 1530 + printer 
Brother HR5C = Joyst. + tijdsehr. + 
boeken en softw. Vraagprijs: f 1000,- 
(excl. softw.) en f 1150,- (incl. softw.) 
Tel. 020-439974. 


@ Videopac G7000 + 13 spellen (0.2. 
spel met de ringen en Wall street fortune) 
Hunt incl. schaakmodule. Prijs: f 200,- + 
Philips ziw/ mon., ook aan te sluiten op 
CBM-64. Tel. (na 18 uur) 040-419496. 


@ CBM-64 + datarec. + 2 joyst. + 
cartr. (musiccomp, avenger) + 100 prof. 
progr. met o.a. Simons Basic, Koala, Pa- 
seal, Pool, Turboload-saver, enz. Prijs: Bfr 
10000 (Hfl 560,-). Tel. 091-72.68.61. 


@ Atari spelcomp. met 5 spellen (Smurt, 
Miss Pacman, enz.). Rob Cornelissen. Tel. 
(op werkdagen na 17 uur) 010-363979. 


© Simons Basic + boek (module). Prijs: 
f 70,-. Tel. 02286-1877. 


@ CBM-1520 plotter-printer incl. 2 rollen 
pap. en softw. (weinig gebr.). Prijs: 
f 200,-. Tel. 030-940927. 


@ CBM-64 + veel softw. + ned. hand. 
event. met cass.rec. (1 jr. oud). Prijs: 

f 550,-. L.A. de Blaauw, CL Fonteynestr. 
6, 8701 EL Bolsward, 

Tel. 05157-4228. 
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1K BIED AAN HARDWARE 

EN SOFTWARE 

@ C-64 + datarec. + disk 1541 + 
plot/print 1520 + Philips mon. + floppy’s 
+ Simons Basic + joyst. + Easyscript. 
Prijs: f 2000,-. Tel. (na 18 uur) 
020-794704 


@ CBM-64 (6 mnd. oud) + heel veel 
softw., spelletjes en ser. progr. Vraag- 
prijs: £ 900,-. Tel. (na 18 uur) 
02286-2452. 


@ CBM-64 + datarec. + printer 
MPS-801 + 1541 drive + Philips mon. 
+ joyst. + seftw. (0.2. Pascal, Superba- 
se, Logo, Pilot, enz.). Alles in een koop. 
Prijs: € 1600,-. L. Hoek, Merwedestr. 13, 
2515 TP s Gravenhage. Tel. 
070-463993. 


@ ViC-20 + #k + 8K + handl. + 
nieuw boek + 2 spelmoduls + spelcass. 
+ listings (6 mnd. oud). Prijs: Bir 6000. 
F. Messiant, Bredabaan 301, B-2060 
Merksem (Belgie). 


@ CBM-16 + datarec. + spelletjes + 
comp.cass. + eng/ned. hancl. + cursus. 
Prijs: f 200,-. Tel. 05281-667. 


IK BIED EN ZOEK HARDWARE 

@ Ik bied een VIC-20 aan voor een 
CBM-64 (zonder cass.rec. Voor een red. 
prijs. M. Loman, Haarlemmetweg 539-lil, 
1055 PM Amsterdam. Tel. 020-823614. 


IK BIED AAN HARDWARE 

EN WIL RUILEN 

@ Te koop: Philips matrix printer P2123. 
Ook te ruilen voor adm. progr. J. Both, 
Wingerd 19, 2742 SB Waddinxveen. Tel. 
(na 13 uur) 01828-13847. 


@ Te koop: Vectrex spelcomp. met 9 
spelmodules (0.2. Webwarp, flipperkast, 
scramble). Vrijwel nieuw. Event. te ruilen 
voor in zeer goede staat verkerende 

154 1-drive. Tel. 070-685603. 


IK BIED AAN SOFTWARE 

@ Football-manager, Tour de France, Tijd- 
reiziger, Steen der wijzen, CAD 3D, Te- 
kenprogr. Prijs per stuk f 10,-. Harjen 
Wolters. Tel. 04180-12542. 


@ C-64 Loon- en salarisber. progr. op 
cass. 1986 witte tabel br-net/net-br en 
kosten werkg. (eigen ontw.). Prijs: f 29,-. 
J. Huisman, Lancasterdreef 12, 8251 TA 
Dronten. Tel. 03210-5273. Gironr. 
4929131. 
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0-128 TEKENPROGRAMMA 

Van Ivan Vanmeert kregen we 
dit tekenprogramma voor de 
C-128. Als u een tekening 
maakt in de C-128 mode kan 
de tekening op een MPS 803 
printer worden gezet door new 
in te tikken en het onderstaan- 
de programma te laden en te 
runnen. Het op papier zetten 
van een tekening neemt vrij 
veel tijd in beslag, maar het 
programma vergroot in elk ge- 
val de vele tekeninstructies die 
de Basic van de C-128 heeft. 


INPUT 

In het oktobernummer vorig 
jaar van Aktief plaatsten we 
een variatie op INPUT, waarbij 
werd afgerekend met het hin- 
derlijke vraagteken. C. Leffers 
Waalkes uit Emmercompa- 
scuum stuurde echter een 
nieuwe, veel kortere, versie in. 
De door hem geleverde varia- 
tie op INPUT luidt POKE 
19,64, Na deze POKE kan ge- 
woon INPUT worden gebruikt. 
Dit is eenvoudiger omdat regel 
10 niet steeds helemaal hoett 


HIRES SCREENDUMP COMMODORE 128 


fast 

dim k(10),1(8,8) 
open 4,4 

for t=1 to 28 
for u=i to 40 
for v=l1 to 8 

for w=l to 7 


VOI AHTI AWN — 


nextinext 


locate v-1+(€u-1)*8,w-1+(t-1)*7 
if rdot¢2)<>0 then lt(v,wi=l:else 1Cv,w)=0 
kCvd=k Cv) tl Cv, wd *2@Cw-1)) 


for a=l1 to 8:kCad=kCad+128:next 


as=*" 


for a=1 to 8:a$=aStchr$(k(a)):next 


print#4,chrs(8)sas; 
for a=1to8:kCad=O:next 
next 

print#4d,chrs(8) 

next 

slow:end 


te worden ingetypt. De POKE 
kan ongedaan gemaakt wor- 
den door POKE 19,0 


TEKENEN MET JOYSTICK 

De heer Aerts uit Diessen 
vraagt zich af of er een pro- 
gramma bestaat waardoor men 
tekeningen kan maken met 
een joystick. Deze tekeningen 
wil hij dan in een Basic- 
programma kunnen gebruiken. 
High resolution tekeningen, bij- 
voorbeeld gemaakt met Kwik 
Paint, zijn het mooiste, maar 
het lukt de heer Aerts niet de- 
ze in een Basic-programma te 
krijgen. Ook heeft de heer 
Aerts problemen om mooie 
ronde figuren te maken op zijn 
beeldscherm. 

De eerste vraag van de heer 
Aerts zullen in het komende 
Commodore Dossier behande- 
len. We brengen dan een spe- 
ciaal programma hiervoor. Wat 
de ronde figuren betreft, dit 
kunt u doen met sprites of een 
combinatie van sprites. De 
Anitmatie-editor kan u hier 
goed bij helpen. Aan te raden 
is een andere karakterset te 


PROGRAMMA SERVICE 


De volgende hoofdprogramma’s zijn op 
schijf of cassette te verkrijgen. 

CD/Base 

De database uit nummer 0. Eenvoudig maar 
goed bestandsbeheer-programma. 

cassette: £20, — 

diskette: (25, — 

CD/Cale 
Spreadsheet-programma of 
werkblad uit nummer 0. 
cassette £20, — 

diskette [25, — 

CD/Viditel 

Viditelprogramma met mogelijkheid tot het 
downloaden van programma’s. 

cassette {15,— 

diskette f15,— 

CD/Word 

Eenvoudige tekstverwerker uit nummer |, 
voor huishoudelijk gebruik. Gecompileerde 
snelle versie. 

cassette 120, - 

diskette 25, — 

CD/Terminal 
Universeel 
nummer 2. 
cassette £20, — 
diskette £25, — 


elektronisch 


communicatieprogramma uit 


CD/Animatie 
Animatie editor uit nummer 4. Eenvoudig 


werkend programma om zelf animaties te 
maken. 

cassette £20, — 

diskette £25, — 


Monitor 50000 


Machinetaal monitor, in gebruik bij de cur- 
sus machinetaal van Commodore Dossier. 
Verschenen in nummer 3 en 4. 


Pionier-abonnees krijgen tien procent kor- 
ting op bovengenoemde prijzen. Een cassette 
kost dus £18,-. Voor een diskette betalen de 
abonnees van het eerste uur £22,50, terwijl 
CD/Viditel £13,50 kost. Op de giro duidelijk 
vermelden het abonneenummer (naast 
programma-naam en cassette/diskette). 
Ook is het mogelijk vorige nummers te 
bestellen, die u om wat voor een reden dan 
ook heeft gemist. De prijs is 7,50 per exem- 
plaar. Nummer 0 is echter uitverkocht! 

De genoemde prijzen zijn inclusief handlei- 
ding, BI'W en verzendkosten. Bestellen uit- 
sluitend door overmaken van genoemde be- 
dragen op giro 26.68.591 of bankrekening 
46.66.85.203 ten name van: 

VNU Business Publications BV, afdeling Le- 
zersservice, Amsterdam. 

Vermeld duidelijk de naam van het program- 
ma en of u het op cassette dan wel op disket- 
te wilt. 
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maken, maar ook hier komen 


~ we in het komende nummer 


op terug. 


DATASPEEDER 

In de listing van onze DA- 
TASPEEDER, die we plaatsten 
in Commodore Dossier 5, is 
een foutje geslopen. Weliswaar 
geen ernstige fout, maar 
toch...Regel- 620 begint met 
REM. Dit had programmeur er 
voor zich zelf als geheu- 
gensteuntje bijgezet om later 
de regel te verwijderen. Dit is 
hij dus vergeten. Nu maakt het 
niets uit of u hem wel intikt, 
aangezien het REM-statement 
er zorg voor draagt dat de 
computer de regel niet als pro- 
grammeerregel ziet. 


GELUIDSROUTINES 

In ons programma Spelen met 
20 geluidsroutines heeft de 
zetduivel toegeslagen. Regel 
130 moet luiden als volgi: 

(8 ={2+7:p3={3+2:w3=13+4 
:a3 = [3+ 5:s3 = {3+ 6<sh/sp> 
c6 


IBM PRINTER 

Niet zo lang geleden bood een 
winkelketen een enorme hoe- 
veelheid IBM PC Compact 
(Model 518 1004)printers tegen 
een schokkend lage prijs te 
koop aan. Veel Commodore- 
bezitters hebben dan ook een 
dergelijke printer gekocht. Het 
op zich uitstekende apparaat 
voldoet nu niet altijd aan hun 
verwachtingen. Zo is de aan- 
sluiting op de Userport en niet 
op de seriéle bus. Het device 
nummer is 2 inplaats van 4 of 
5, Listings worden slechts ten 
dele geprint, tenzij men de in 
de handleiding opgegeven 
CHRS$(0) vervangt door (1) en 
met Poke 660,0 de buffer leeg- 
maakt. Een tekstverwerker als 
Write Now van Cardo werkt 
helemaal niet op deze printer. 
Easyscript aan de andere kant 
weer wel. Het probleem van 
deze printer is dat hij wordt 
aangestuurd door de user- 
poort. Sommige tekstverwer- 
kers, zoals Easyscript, sturen 
hun output naar beide uitgan- 
gen, maar anderen alleen naar 
de seriéle poort. Daar is he- 
laas niets aan te doen. 











DE CBM 1541 DISKDRIVE 
NU 25 X SNELLER 


Ombouw 250,- / nieuwprijs 
150,- boven onze standaard 
verkoopprijs 


VAN DE UITVINDERS VAN DE FINAL CARTRIDGE EN COMMODORE SPECIAL. 


Home & Personal Computers 
Wolphaertsbocht 234 
3083 MV Rotterdam 

Tel.: 010-231982. 











ESCCUWN 


AUTHORIZED COMMODORE REPAIR CENTRE ra 
=> TOPAZ 
ee 


DE 
GEGARANDEERDE 
OPLOSSING VAN 


UW NETSPANNINGS 
PROBLEMEN 


Met de series Ultra-isolatoren, Power Conditioners, stabili- 
satoren en no-break voedingen voorkomt Topaz computer- 
problemen t.g.v. netstoringen. 


is verhuisd! 


Voor reparatie van: 


C128, C64, C16, VIC20 


MONITOREN, PRINTERS, DISC DRIVES 


PC10, PC20 


voortaan naar: 





Een greep uit ons volledig pakket netspanningskonditione- 
ring: 


NIEUWE GENERATIE POWER CONDITIONERS 


Antoniuslaan 1, 3341 GA H.!.Ambacht 


telefoon 01858-12766 




















COMMODORE DOSSIER 








ALS HANDIG NASLAGWERK. 


In deze stevige band houdt u een hele jaargang | De beveiliging tegen netspanningspieken en fluktuaties 
Commodore Dossier en Commodore Dossier 
Aktief overzichtelijk bij elkaar. Als handig ® piekstroomverwerking tot 14 x nominaal, dus overdimen- 


sionering niet nodig 
microprocessor gekontroleerd 
zeer snelle reaktietijd 
vermogens 500 tot 3000 VA 


naslagwerk vol waardevolle informatie. 


Luxe jaarband 

De band is uitgevoerd in wit met helder blauwe opdruk, voorzien 
van metalen klempennen en jaarstickers. De vergelijkbare 
winkelwaarde is f 22,50. De Commodore Dossierprijs* is: 


- voor pionier abonnees f 13,50 - voor overige abonnees f 16,— 
- voor niet abonnees f 18,50 *(incl. BTW en verzendkosten) MICRO UPS POWERMAKER 


Bestellen De gegarandeerde oplossing 
U kunt de band bestellen door het betreffende bedrag over te bij netuitval en spannings- 
maken op banknr. 46.66.85.203 of daling 

postgiro 26.68.591, t.n.v. 

VNU Business Publications BV te SSIER 

Amsterdam onder vermelding van: Bg aunoDoe? @ 400-1000 VA 
CD/Jaarband en uw evt. abonnee- : @ low cost 


nummer. (levertijd 1 a 2 weken) @ zeer korte omschakeltijd 
® ingebouwd filter 


® sinusuitgang 










VNU Business Publications 
Postbus 9194 1006 CC Amsterdam 








Laat U vrijblijvend informeren door onze produkt- 
specialisten. 


klaasing electronics b.v. 


beneluxweg 27, 4904 sj oosterhout, 
tel.: 01620-8 1622/696, telex: 54598, fax:01620-56500 
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